../../ungrib/src/module_stringutil.F